Fortran 可变大小的数组

integer, allocatable :: a(:)
! 第一种写法，指定了数组大小
allocate(a(students), stat = error)
! 第二种写法，复制已有数组
allocate(a, source = s_array)
deallocate(a)